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1 . INTRODUCTION 


The purpose of this study effort is to conduct a review of 
the Spacelab Configuration Contamination Computer Model to determine 
the compatibility of the program, as presently formatted, with the 
computer facilities at MSFC. When the computer differences and 
interface requirements have been determined, a computer interface 
document will be established setting forth the necessary Spacelab 
model modifications to be made if awd when the program is transferred 
for utilization at MSFC. 

This task requires that the present computer complement at 
MSFC and future planning for it be determined and a comparison 
made of the programming differences between suitable MSFC com- 
puters and the CDC 6000 series computers for which the program 
is presently formatted at Martin Marietta Aerospace. 

This report describes the MSFC computer facilities, and 
future plans for them, and discusses characteristics of the various 
computers as to availability and suitability for processing the 
contamination program. A listing of the CDC 6000 series and 
UNIVAC 110 ‘j characteristics is presented so that programming 
requirements can be compared directly and differences noted. 

This report indicates the interim status of the task effort 
to date. The task will culminate with a final interface document 
to be published in September 1976. 


2. STUDY ACTIVITY STATUS 

Time allotted to this study has been utilized in determining 
the present computer complement at MSFC, projected future changes, 
the suitability and availability of the various MSFC computers, 
and the basic differences between the applicable MSFC computers 
and the CDC 6000 computer for which the program is presently 
formatted. A summary of the findings of this study to date is 
presented in the following subsections. 

2.1 Presently Available Computer Facilities at MSFC - Computers 
presently available at MSFC include two UNIVAC 1108' s, one PDP 
11/45, and several IBM 360's. In addition, lines are available 
to the Slidell facility where other UNIVAC 1108's and IBM models 
are located. 
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The basic MSFC computer for engineering problems is the 
UNIVAC 1108. The PDP 11/45 is also available for engineering 
problems but is a much smaller and slower computer. The IPLi 360's 
are used primarily for Data Systems storage, processing, r.nd re- 
trieval and will not be available for engineering problem process- 
ing. 


At present, MSFC operates in the Batch Processing Mode wherein 
programs are submitted and await their turn for processing by the 
computer operators. This process requires about one day for re- 
ceipt of data from the time of program submittal. Also, at the 
present time, a Common Accessing Process is used wherein a user 
requests data or programs stored on tape reels in a storage vault. 
With this process, a computer operator is required to go to the 
vault, find the requested tape, and connect it into the equipment 
before a program can proceed. 

2.2 Future MSFC Facility Modifications - In the near future, 

MSFC will adapt its facilities to the Remote Terminal Interactive 
Mode of operation. This mode will involve installation of remote 
access terminals at various locations away from the central com- 
puter stations. These terminals will provide immediate access 
to computers for anyone who desires it and can operate the ter- 
minal equipment. However, programs which require excessive com- 
puter time (two hours or more) will still be relegated to the Batch 
Processing Mode of operation. Printout facilities will also be 
located at the remote terminals to reduce delay in printout data 
receipt . 

Also, in the near future, graphic display capability will be 
added wherein the computed data will be plotted automatically at 
the remote terminal for those desiring such presentation. This 
facility will eliminate the onerous task of plotting tabular data 
by hand and speed up the processing of trial and error problems 
by permitting the terminal user to modify variables rapidly until 
a desired result is obtained. 

Within two years, disc storage within the computer system 
will be made available and will eliminate the delays encountered 
with the present Common Accessing Process. Also, within two years, 
MSFC computers will be linked into a common system. This arrange- 
ment will more nearly equalize computer usage and reduce access 
delays such as would be encountered when a user addresses a com- 
puter which is down for repairs or servicing. 
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2. 3 Availability and Acceptability of MSFC Computers for 
Processing Spacelab Configuration Contamination Programs - Only 
the UNIVAC 1108' s and the PDP 11/45 will be made available for 
processing programs such as that required for the Spacelab con- 
tamination investigation. The UNIVAC 1108 is completely suitable. 
The PDP 11/45 has limited capabilities. 

2.3.1 PDP 11/45 Acceptability - Disadvantages of the PDP 11/45 
for processing the Spacelab configuration contamination program 
are : 

a. short word length, 

b. small memory capacity, 

c. low speed processing, and 

d. reduced precision. 

The normal word length used with PDP 11/45 programs consists 
of 16 binary bits. A double precision process can be used wherein 
32 bit words are available. However, use of such a process would 
automatically reduce the memory capacity to one-half that avail- 
able with 16 bit words. Capacity with 16 bit words is 124,000 
words of addressable memory space. The Spacelab contamination 
program as presently formatted uses approximately 100,000 sixty 
bit words. Although it is possible to reformat the contamination 
program to fit within the limited PDP 11/45 capacity, the end 
result would be a much more simplified model with limited flex- 
ibility and a considerable reduction of accuracy. It would also re 
quire a considerable amount of effort and time. Furthermore, the 
program would require processing in a series of incremental steps, 
one step at a time. Add to this the fact that the speed of the 
PDP 11/45 is only about one-hundredth that of the CDC 6000 and 
the indications are that the PDP 11/45 is not an acceptable 
system for processing the contamination program. 


2.3.2 UNIVAC 1108 Adaptation Requirement s - In order to convert 
the existing CDC program for use on the UNIVAC, differences in 
source programs between the two computer systems must be con- 
sidered. The two compilers accept source programs that differ 
in at least three ways. These are that: 

a. there are differences in permissible number sizes; 

b. there are some features of FORTRAN that are not avail- 
able in both implementations; anJ 

c. some implementations go beyond the standard features 
of FORTRAN. 
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Table I is a listing of the characteristics of the. two systems. 

The comparable characteristics .ore presented side by side so that 
differences can be identified more easily. A program compatible 
with both systems can then be written by noting the similarities 
between the two systems or the CDC program can be maintained as 
is and a revised program can be written fr. the UNIVAC consider- 
ing its specific characteristics when and if it is requested by 
MSFC. The latter option is probably the most logical approach 
from a convenience standpoint in that current programming methods 
for the ongoing modeling activities would not require modification 
to a new system. 


3. SUMMARY 

The UNIVAC 1108 computer has been selected as the most suit- 
able, available system in tha MSFC complement for processing the 
Spacelab Configuration Contamination Computer MoPel Program. 
Programming characteristics comparisons between the CDC 6000 
Series and UNIVAC 1108 have been made and are presented in this 
report. As indicated by the comparison table, presently avail- 
able cards and tapes generated for use with the CDC computer are 
not directly compatible with the UNIVAC 1108 requirements and 
reformatting will be necessary. However, no untoward problems 
have Deen indicated by the comparison and reformatting of the 
general programming processes should require only a few days, 
at most, once the specific translational rules are set down. 

The final report will present these translational requirements. 
Plotting, on the other hand, will require a complete rewrite tak- 
ing into consideration the specific software packages and periph- 
erals eventually to be made available for that purpose at MSFC. 
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TABLE I CHARACTERISTICS OF CDC 6000 SERIES 
AND UNI VAC 1108 COMPUTERS 


CDC 6000 SERIES 
FORTRAN IV 

1) VARIABLE AND FUNCTION 
TYPES 


EXPLICIT 

INTEGER 

REAL 

DOUBLE PRECISION 

COMPLEX 

LOGICAL 


UNIVAC 1108 
FORTRAN V 

1) VARIABLE AND FUNCTION 

types 


EXPLICIT 

EXPLICIT 

REAL 

DOUBLE PRECISION 

COMPLEX 

LOGICAL 


DOUBLE NA 


IMPLICIT IMPLICIT 

NA IMPLICIT type (a^ ,a 2 ,. , 

type (a 1 ,a 2 ,. . . ) 

type: INTEGER, REAL .COMPLEX .LOGICAL 

INTEGER (standard 4) 

REAL (standard 8) 

COMPLEX (standard 8) 

LOGICAL (standard 4) 

type can be double precision. 

a i ,a ? , . . . single alphabetic 
characters or a 
range of characters 


Example: 

IMPLICIT REAL (A-H.O-Z.S), 
I NTEGER ( I -N ) 
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TABLE I (continued) 

CDC 6000 SERIES 

2) CONTROL STATEMENTS 

GO TO n 

ASSIGN n TO i 

GO TO i , (m, ,. . . ,m. ) 

GO TO i 1 1 

GO TO (m^ ,m z . . .nu ) ,i 
IF ( 3 ) m • ■ « • ,m« 

IF (a) S 1 2 3 

IF (a) n,,n 9 TWO BRANCH 
1 c LOGICAL IF 
DO ni _ m, ,mp»m., 

CONTINUE 1 c 5 
PAUSE 

IF (a) m, ,m 9 TWO BRANCH 

1 c ARITHMETIC IF 

STOP 

END 

Note: a is a logical 
variable 


Example: 

ASSIGN 64 to J 
GO TO J 

GO TO J, (10,13,25,64,83) 
PAUSE n 
STOP n 

n is a string of 1 to 5 
octal digits 

END name 

name is the name of the 
proqram or subprogram 
which it terminates, and 
is ignored by the compiler 

IF (l)n,,n ? two branch loqical 
if. 1 

NA 


UNIVAC 1108 

2) CONTROL STATEMENTS 

GO TO n 

ASSIGN n TO i 

GO TO i , (m, . . ,m. ) 

GO TO 1 1 1 

GO TO (m, ,m 9 ,. . . ,m. ),i 

IF (a) M ml 

IF (a) S 1 2 3 

NA 

DO n i = m, ,m ? ,m-. 
CONTINUE 1 c J 
PAUSE 

IF (a) m 1 , m 2 

STOP 

END 

Note: a is a logical 
variable 


Example: 

ASSIGN 64 TO J 
GO TO J 

GO TO J, (10, 13, 25, 64, 83) 
PAUSE n 
STOP n 

n is a string of 1 to 6 
alphanumeric characters 

NA 


i END 

i is a statement number; it 
may be referenced by a 
contro, statement. 
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TABLE I (continued) 


CDC 6000 SERIES 

UNIVAC 1108 

SUBPROGRAM STATEMENTS 3) 

SUBPROGRAM STATEMENTS 

Statement function: 
name (p, ,. . . ,p )=expression 
reference, name (a ,...,a n ) 

Statement function: 
name (p ,. . . ,p )=cxpression 
reference, name (a-|,...,a n ) 

Subroutine subprograms: 

Subroutine subprograms: 

SUBROUTINE name (p ,...,p ) 
SUBROUTINE name * " 

reference CALL SUBROUTINE 
name (a, ,. . . ,a ) 

CALL SUBROUTINE name 

SUBROUTINE name (p, p ) 

SUBROUTINE name 
reference CALL SUBROUTINE 
name (a, ,. . . ,a ) 

CALL SUBROUTINE, name 

Function subprograms: 

Function subprograms: 

type FUNCTION name 

( Pi » • • • »P 0 ) 
type FUNCTION name 
reference, name (p^,...,p n ) 
name 

type FUNCTION name 

(pi , . . . ,p ) 

type FUNCTION name 
reference, name (p^,...,p n ) 
name 


Type is REAL, INTEGER, DOUBLE 
PRECISION COMPLEX, LOGICAL. 
When type is omitted, the 
mode is determined by the 
first character of name. 
EXTERNAL name-., name ? ,... 
RETURN 

PROGRAM name (f,, — ,f ) 

The parameter f. must be n the 
names of all input/output 
files required by the main 
program and its subprograms. 

ENTRY name 

The formal parameters, if 
any, are the same as those 
with the FUNCTION or SUB- 
ROUTINE statement, and do 
not appear with the ENTRY 
statement. 

BLOCK DATA 


Type is REAL, INTEGER, DOUBLE 
PRECISION COMPLEX, LOGICAL. 
When type is omitted, the 
mode is determined by the 
first character of name. 
EXTERNAL name-,, name-,... 
RETURN 

NA 


ENTRY name (p, , . . . ,p ) 
p. are the arguments corres- 
pindinq to an actual arqument 
in a CALL statement or in a 
function reference. Compatible 
with IBM SYSTEM 360. 

BLOCK DATA 

In order to collect a block 
data subprogram as part of a 
program for execution, the 
block data subprogram must be 
referenced. 
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TABLE I (continued) 
CDC 6000 SERIES 


UN I VAC 1108 


NA DEFINE name = expression 

DEFINE NAME (p ] p ) = 

expression 

reference, name (a,,..., a ) 
a DEFINE procedure generates 
inline code when it is ref- 
erenced. DEFINE is analogous 
to a statement function. 

NA RETURN k 

k is an integer constant, a 

parameter variable, or an 
integer variable. 

Example: 

Calling Program 


10 CALL SUB 
(A,$ or & 30) 
20 Y = A+B 


30 Y = A+C 


NA Function Subprograms: 

Type FUNCTION name *S(p, ,. . . ,p n ) 
Univac in order to be compatible with 
IBM SYSTEM 360, will accept the above 
FUNCTION statement 

NA ABNORMAL 

In order to produce correct and 
efficient code, the compiler 
recognizes common subexpressions. 

That is, a subexpression is 


Subprogram 


SUBROUTINE SUB 
(X ,$ or *) 


100 IF (M) 200, 
300, 200 
200 RETURN 
300 RETURN 2 
END 
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TABLE I (continued) 
CDC 6000 SERIES 


UNIVAr 1108 


evaluated only once if the var- 
iables contained in it are not 
altered. These subexpressions 
contain variables in common. If 
a COMMON variable is altered by 
a function, the function should 
be declared ABNORMAL in order for 
the compiler to generate correct 
code. 

NA INTERNAL FUNCTIONS AND SUBROUTINES 

Internal subprograms are compiled 
in conjunction with a main program, 
an external function subprogram, or 
an external subroutine subprogram. 

An internal subprogram may be ref- 
erenced from any part of its pro- 
gram unit except from its own body. 

Example: 


Y=A+B 

CALL SAM (X) 


RETURN 

SUBROUTINE SAM (T) 

Z = Y 

T = Z+A 

RETURN 

END 
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TABLE I (continued) 

CDC 6000 SERIES 

4) ALLOCATION STATEMENTS 

COMPLEX list 
DOUBLE PRECISION list 
REAL list 
INTEGER list 
LOGICAL list 

DIMENSION v,,v ? v 

COMMON/ 1-j/l 1 stf p/l i stLl. . . 


UNIVmC 1108 

4 ) ALLOCATION STATEMENTS 

COMPLEX list 

DOUBLE PRECISION list 

REAL list 

INTEGER list 

LOGICAL list 

DIMENSION v, ,v ?> . . . ,v 

COMMON/ 1 ^llst/^/list 1 . . 


/I./... represent optional names 
consisting of 1 - 6 alphanumeric 
characters, the first of which 
is alphabetic. 

EQUIVALENCE (a, ,b, 
b 2 ,. ..),..! 1 

>' TA TisWa,,. . . ,a /, 
iist 2 /b-| .... ,b n /,. .. 


/I ./••• represent optional names 
consisting of 1 - 6 alphanumeric 
characters, the first of which 
is alphabetic. 

EQUIVALENCE (a, ,b, 

(a 2 b 2 ,. ..),... 

DATA iist,/a, ,. . . ,a /, 

1 ist 2 /b 1 ,. . ! ,b /,. . . 


COMMON/1 ^listj/lp/listo NA 

/ 1 . / . . . represent optional 
names consisting of 1 - 7 
alphanumeric characters. They 
may be al 1 numeric . 


DATA (listi=c ,...,c ), (list 9 = NA 

d R ).:.. n 

DOUBLE list 

NA Type v^/1 j/Vg/l 2 /. • • 

v. represents a list of variables 

1 1 represents a literal list. 

DIMENSION v 1 /l,/v 2 /l 2 . . . 
v. represents a list of array 
declarations. 

1. represents a literal list. 
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TABLE I (continued) 
CDC 6000 SERIES 


UN I VAC 1108 


5) REPLACEMENT STATEMENTS 5) REPLACEMENT STATMENTS 


a = Arithmetic expression a = Arithmetic expression 

1 = Logical expression 1 = Logical expression 

m = Masking expression NA 


The masking expression is a 
generalized form of logical 
expression in which the vari- 
ables may be types other than 
logical . 

Multiple Replacement Statement 
A=B=C*expression 

Multiple Statement Cards 
A=expression $ 

B*expression 

6) FORMAT STATEMENT AND 
S PECIFICATION? 

FORMAT (spec.| .spec ) 

Where spec^ = 

EW.d Single precision float- 
ing point with exponent 
FW.d Single precision float- 
ing point without 
exponent 

DW.d Double precision float- 
ing point with exponent 
GW.d Single precision float- 
ing point with or with- 
out exponent 
IW Decimal integer 

Aw Alphanumeric, left 

justified, with trail- 
ing blanks 
Lw Logical 

nP Scaling factor 

Complex values are converted 
by a pair of consecutive 
EW.D or FW.D. 
wX Intra-line spacing 

wH Transmits literal data 


6) FORMAT STATEMENT AND 
SPECIFICATIONS 

FORMAT (spec^ ,. . . ,spec n ) 

Where spec. = 

EW.d Single precision float- 
ing point with exponent 
FW.d Single precision float- 
ing point without 
exponent 

DW.d Double precision float- 
ing point with exponent 
GW.d Single precision float- 
ing point with or with- 
out exponent 
IW Decimal integer 

Aw Alphanumeric, left 

justified, with trail- 
ing blanks 
Lw Logical 

nP Scaling factor 

Complex values are converted 
by a pair of consecutive 
EW.d or FW.d. 
wX Intra-line spacing 

wH Transmits literal data 
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TABLE I (continued) 

CDC 6000 SERIES 

Rw Alphanumeric, right 
justified, leading 
zeros 

*...* Transmits literal data 
Ow Octal integer 


UNIVAC 1108 

Rw Alphanumeric, right 
justified 

Transmits literal data 
NA 


NA Tw Indicates the position in 

a FORTRAN record where 
transfer of data is to 
start. Complex values are 
converted by a pair of E, F, 
or G format codes. 


7) PRINTER CARRIAGE CONTROL 7) 

0 Double space after 
Drinting 

1 Eject page before 
printing 

+ Suppress spacinq before 
printing 

blank Single space after 
printing 


PRINTER CARRIAGE CONTROL 

0 Double space after 
printing 

1 Eject page before 
printing 

+ Suppress spacinq before 
printing 
blank Sinqle space after 
pri nting 


8) INPUT/OUTPUT AND DATA 
TRANSMISSION 

READ n, list 
PRINT n, list 
PUNCH n, list 
READ (i,n) list 
WRITE (i ,n) 1 i st 
READ (i) list 
WRITE (i) list 
END FILE i 
REWIND i 
BACKSPACE i 

NAMELIST/x/a,b,...,c/y/d,e, 

...f... 

READ (i,x) - namelist read 
WRITE (i ,x)-namel ist write 


8) INPUT/OUTPUT AND DATA 
TRANSMISSION 

READ n, list 
PRINT n, list 
PUNCH n, list 
READ (i,n) list 
WRITE (i,n) list 
READ (i) list 
WRITE (i) list 
END FILE i 
REWIND i 
BACKSPACE i 

NAMELIST/x/a ,b, . . . ,c/y/d,e, 
...f... 

READ (i,x) - namelist read 
WRITE (i ,x)-namel ist write 
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TABLE I (continued) 
CDC 6000 SERIES 
BUFFER IN (i,m) list 


BUFFER OUT (1 ,m) list 

ENCODE (c,n,v) list 
DECODE (c,n,v) list 

IF ( EOF , i ) ni ,n ? 
IF(ENJFILE,i)ni ,n 2 
IF ( UN IT , i )n-| ^ 2 , 03,04 

NA 


NA 


NA 

NA 

NA 




UNIVAC 1108 

READ(a ,b,END=c ,ERR=d) list 
END=c is optional, transfer to 
c encountering the end of 
the data set 

ERR=d is optional, transfer to 
d encountering error condi- 
tion in data transfer 

WRITE (a ,b,END=c ,ERR=d) list 

ENCODE (v,n) list 

DECODE (v,n) list 

NA 


DEFINE FILE a! (irn .r, ^ , 

a n ( n 1 n’ r n’ ir n’ v n' 


describes data set used during a 
direct access 
Input/out operation 
a - data set reference number, 
m - number of records in a. 

r - record size maximum, 

f - format control . 

v - associated variable. 


READ(a'r,b,ERR=d) list 
a - data set reference number 

followed by an apostrophe, 
r - integer, relative position 

of record in data set. 
b - format statement number, 

operational 

ERR = d, same as above, 


WRITE (a ' r ,b) list 
FIND (a ' r ) 

finds next input record while present 
record is being processed. 
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TABLE I (continued) 

CDC 6000 SERIES 
9) S UBSCRIPTS 

A ( i i , . . . , i n ) 

1 S n $ 3 

i may be: 
integer constant 
simple integer variable 
simple integer arithmetic 
expression 

NA 


10) FORTRAN DECK STRUCTURE 

(1) Program declaration 

statements 

(a) PROGRAM 

(b) FUNCTION 

(c) SUBROUTINE 

(d) BLOCK DATA 

(2) Type statements 

(3) DIMENSION statements 

(4) COMMON statements 

(5) EQUIVALENCE statements 

(6) DATA statements 

(7) NAMELIST statements 

(8) EXTERNAL statements 

(9) Executable statements 

(10) FORMAT statements 

(11) END 


UNIVAC 1108 


9) SUBSCRIPTS 


i may be: 
integer constant 
simple integer variable 
simple integer arithmetic 
expression 

A* 1 ! V 

1 ^ n $ 7 
i as above 

10) FORTRAN DECK STRUCTURE 

(1) Proqram declaration 

statements 

(a) PROGRAM 

(b) FUNCTION 

(c) SUBROUTINE 

(d) BLOCK DATA 

(2) Type statements 

(3) DIMENSION statements 

(4) COMMON statements 

(5) EQUIVALENCE statements 

(6) DATA statements 

(7) NAMELIST statements 

(8) EXTERNAL statements 

(9) Executable statements 

(10) FORMAT statements 

(11) END 
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TABLE I (continued) 

11) FORTRAN CONSTANTS 


CDC 6000 SERIES 


UNI VAC 1108 


Integer 

n,n 0 ..n m 
1 2 m 

"l n 2*- n m 


1 $ m $ 18 

1 $ m $ 11 

Octal 

On, . .n 
1 m 

On, . . n_ 
I m 


6 $ m v 20 

1 $ m < 12 


n, . .n m B 
l m 

1 $ m < 20 


Real 

n V n n E - exp 10 

n l" n m E - exp 10 


1 3 m $ 15 

1 ^ m $ 9 

Double 
Preci sion 

n l • • n m D ± ex Pi 0 
1 < m S 18 

n T- n m D± exp 10 
1 5 m $ 18 

Compl ex 

(r ] ,r 2 ) 

(r ] ,r 2 ) 


r^=real 

r^=real 


r 2 = imaginary 

r 2 = imaginary 

Literal 

nHf. . . f 
1 n 

nHf. . .f 
1 n 


replacement: 

all modes: 


1 $ n S 10 

1 ^ n ^ unlimited 


Format: 

*G0GETIT* 

1 $ n S 136 

'f,..f ' 

1 n 

1 ^ n ^ uni imited 


data statement 



1 $ n $ 1307, 


Logical 

.TRUE. .T. 
.FALSE. .F. 



EXAMPLES 


for 2, m=l 
for 247, m=l 


0231461 

777000B 


3.14 

.0749 

3.14E05 


3.1415D0 

-16.9D+19 


(1. ,6.55) 

( 0 ..- 1 .) 
(-15. ,16.7) 


7UG0GETIT 
' GOGET I T ' 
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TABLE I (continued) 

12) FORTRAN VARIABLES 


Integer 


CDC 6000 SERIES 

UNIVAC 1108 


a, a,. .a m 
1 2 m 

a,a 9 . .a m 
1 2 m 

N 

tv 

V/ 

E 

V/ 

1 $ m i. 6 

L2504 

a-j I to N 

a.| I to N 

M58 

All a's past a^al 

phanumeric 


a,a 9 . .a_ 
1 2 m 

0 -i 0 r\ • • 0 

1 2 m 

VECTOR 

1 ^ m ^ 7 

1 ^ m $ 6 

SPOILS 


EXAMPLES 


a-j alphabetic other than I to N 

all a's past a-j alphanumeric 

Variables defined by type declarations 
begin with any letter. 
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TABLE I (continued) 

13) FORTRAN FUNCTIONS 



CDC 6000 SERIES 

UNIVAC 11 

Exponential 

EXP(x) 

EXP(x) 


DEXP(d) 

DEXP(d) 


CEXP(c) 

CEXP(c) 

Natural 

ALOG(x) 

ALOG(x) 

Logarithm 

DLOG(d) 

DLOG(d) 


CLOG(c) 

CLOG(c) 

Common 

AL0G10(x) 

ALOGlO(x) 

Logarithm 

DL0G10(D) 

DLOGlO(d) 

Arcsine 

ASIN(x) 

ASIN(x) 



DASIN(d) 

Arccosine 

ACOS(x) 

ACOS(x) 



DACOS(d) 

Arctangent 

ATAN(x) 

ATAN(x) 


ATAN2(x^ ,x^) 

ATAN2(x ] ,x 2 ) 


DATAN2(d ] ,d 2 ) 

DATAN2 (d -j ,d 2 ) 

Sine 

SIN(x) 

SIN(x) 


DSIN(d) 

DSIN(d) 


CSIN(c) 

CSIN(c) 

Note: in the arguments 


i=integer 

x=real 

d=double 

c=complex 

precision 
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CDC 6000 SERIES 

UN T VAC 1108 

Cosine 

COS(x) 

COS(x) 


DCOS(d) 

DCOS(d) 


CCOS(c) 

CCOS(c) 

Tangent 

TAN(x) 

TAN(x) 



DTAN(d) 



CTAN(c) 

Square Root 

SQRT(x) 

SQRT(x) 


DSQRT(d) 

DSQRT(d) 


CSQRT(c) 

CSQRT(c) 

Cube Root 

NA 

CBRT(x) 



DCBRT(d) 



CCBRT(c) 

Hyperbol ic 

riA 

SINH(x) 

Sine 


DSINH(d) 



CSINH(c) 

Hyperbol ic 
Cosine 

NA 

COSH(x) 



DCOSH(d) 



CCOSH(c) 

Hyperbolic 

Tangent 

TANH(x) 

TANH(x) 



DTANH(d) 



CTANH(C) 
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Modular 

Arithmetic 


Absolute 

Value 


Truncation 


Largest 

Value 


Smallest 

Value 


Float 


CDC 6000 SERIES 

UNIVAC 1108 

AM0D(x 1 ,x 2 ) 

AM0D(x-| ,x 2 ) 

MOD ( i -| , i 2 ) 

MOD ( i -j , i 2 ) 

DMOD (d -| ,d 2 ) 

DMOD (d -j ,d 9 ) 

ABS(x) 

ABS(x) 

DABS(d) 

DABS(d) 

CAGS(c) 

CABS(c) 

IABS(i) 

IABS(i) 

AINT(x) 

AINT(x) 

INT(x) 

INT(x) 

IDINT(d) 

IDINT(d) 


DINT(d) 

AMAX0( i , i 2 * • • - ) 

AMAX0( i 1 , i 2 * - - - ) 

AMAXl(x.,x 2 ,...) 

AMAX1 (x-j ,x 2 ,* • • ) 

X 

o 

— J 

ro 

MAXO ( i 1 • • ) 

MAXI (x 1 ,x 2 ,. . . ) 

MAXI (x-j ,x 2> . . . ) 

DMAXl(d ] ,d 2 ,...) 

D'^lAXl (d ] ,d 2 ,... ) 

AMIN0(1 1 ,1 2 . — ) 

AMIN0(i'i ,i 2 » — ) 

AMIN1 (x ] ,x 2 ,...) 

AMIN1 (x ] ,x 2 ....) 

MIN0(i 1 , i 2 , . . . ) 

f 1 1 N 0 ( i i , i 2 » - • • ) 

MINI (x ] ,x 2 ,...) 

Mim(x 1 ,x 2 ,...) 

DM I Ml ( d ! ,d 2 ,. . . ) 

DMIN1 (d ] ,d 2 ....) 

FLOAT (i ) 

FLOAT(i) 
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CDC 6000 SERIES 


UN I VAC 1108 


Fix 

IFIX(x) 

IFIX(x) 

Transfer 
of Sign 

S I GN ( x -j ,x 2 ) 

I S I GN ( i 1 ,i 2 ) 
DSIGN(d ] ,d 2 ) 

S I GN ( x i ,x 2 ) 

I S I GN ( i -j ,i 2 ) 
DSIGN(d ] ,d 2 ) 

■ 1 | 
Positive 

Difference 

DIM(x r x 2 ) 
IDIM(1 1 ,i 2 ) 

D I M ( x i ,x 2 ) 
IDIM(i ] ,i 2 ) 

Significant 
Part of DP 
Argument 

SNGL(d) 

SNGL(d) 

Real Part 
of Complex 

REAL (c ) 

REAL (c ) 

Imaginary Part 

AIMAG(c) 

AIMAG(c) 


of Complex 


Real to DP 

DBLE(x) 

DBLE(x) 

Real to Complex 

CMPLX(x ] ,x 2 ) 

CMPLX(x 1 ,x 2 ) 

Conjugate 

CON JG (c ) 

CONJG(c) 

Logical 

Product 

AND ( x i . ,x n ) 

AND(x 1 ,x 2 ) 

Logical Sum 

0R(x ] ... ,x n ) 

0R(x 1 ,x 2 ) 

Complement 

COMPL(x) 

COMPL(x) 

Number of 
Words from 
Unit i 

LENGTH ( i ) 

NA 
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TABLE I (continued) 



CDC 6000 SERIES 
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Random 

RANF(x) 

NA 

Number 



Time from 

SECOND(i) 

NA 

Dead Start 
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TABLE I (continued) 
14) CHARACTER CODES 
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R CODE | 

PUNCH CARD 

imi 

CDC 

UN I VAC 





12-8-3 

12-8-3 


12-8-4 

12-8-4 

47 

11-8-3 

11-8-3 


11-8-4 

11-8-4 

56 

0-8-3 

0-8-3 

51 

0-8-4 

0-8-4 

44 

8-3 

8-3 

NA 

NA 

NA 

01 

8-7 

12-8-5 

43 

12-0 

12-8-6 

02 

0-8-2 

11-8-5 

73 

12-8-7 

11-8-6 .. 

04 

NA 

11-8-7 

57 

NA 

0-8-6 

00 

NA 

8-7 

53 

8-2 

8-5 

45 

11-8-7 

8-6 

54 

NA 

12-0 

55 

NA 

11-0 

77 

NA 

0-8-2 

46 

NA 

8-2 

72 

NA 

8-4 

03 

NA 

12-8-7 

NA 

0-8-6 

NA 

NA 

8-4 

NA 

NA 

0-8-5 

NA 

NA 

n-o 

NA 

NA 


Mil, 

NA 

11-8-5 

NA 

NA 

11-8-6 

NA 

NA 

8-5 

NA 

NA 

12-8-5 

NA 

NA 

12-8-6 

NA ! 
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TABLE I (continued) 


15) FLOATING POINT WORD STRUCTURE 

CDC 6000 SERIES 

Floating point arithmetic takes advantage of th^ ability to 
express a number with the general expression KB, where: 

K = coefficient 

B = base number 


n = exponent or power to which the base number is raised 

The base number is constant (2) for binary-coded quantities and 
is not included in the general format. The 60-bit floating- 
point format is shown below. The binary point is considered to be 
to the right of the coefficient, thereby providing a 48-bit in- 
teger coefficient, the equivalent of about 14 decimal digits. 

The sign of the coefficient is carried in the highest order bit 
of the packed word. Neqative numbers are represented in one's 
complement notation. 



The Univac 1108 processor can operate with two forms of floating 
point arithmetic: Single-precision and double-precision. 

Single-precision instructions produce doubl e-preci sion results, 
i .e. , a two word results. 

The 1108 requires that the coefficients and the exponents with 
their separate signs be provided in the following formats: 
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TABLE I (concluded) 


i < 

c ■ 


Coeff ici ent 
Sign 


Biased 

Exponent 


Fractional 

Coefficient 


1 


8 


27 


35 34 


27 26 


Single-Precision Floating Point 

The coefficient is the numerical value of the data, it is always 
a fractional value less than 1. However, the exponent is not 
the exponent of the coefficient; it is the exponent of the base. 

Coefficient Biased Fractional 

Sign Exponent Coefficient 

l| 11 | 60 /J 0 

71 70 60 59 


Dougle-Precision Floating Point Number 

For single-precision the 8 bit exponent carries a bias of 2^(200 2 ). 

For double precision the 11 bit exponent carries a bias of 2' 0 (2000g). 


16) FIXED POINT WORD STRUCTURE 

CDC 6000 

Negative numbers are represented ir, one's complement notation and 
overflows are ignored. The sign bit is in the high-order bit 
position (bit 59) and the binary point is at the right of the low- 
order bit position (bit 0). 

UNIVAC 1108 

The basic fixed-point number is a 36 bit binary word. The sign 
bit is in the high-order bit position (bit 35) and the binary 
point is at the right of the low-order bit position (bit O'. 
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